home *** CD-ROM | disk | FTP | other *** search
/ CyberMycha Extra 2004 January / CyberMycha Extra 1-2004 (Poland) (Disc 2).bin / Pippi / gmsl.dir / Internal_60_pippi.ls < prev    next >
Encoding:
Text File  |  2001-09-04  |  413 b   |  30 lines
  1. property meSprite, firstFrame
  2. global gmObject
  3.  
  4. on beginSprite me
  5.   firstFrame = the frame
  6.   firstCursorSwitch = 0
  7.   meSprite = sprite(me.spriteNum)
  8.   gmObject.pippi = meSprite
  9. end
  10.  
  11. on mouseUp me
  12.   firstCursorSwitch = 1
  13.   gmObject.buttonX()
  14.   pass()
  15. end
  16.  
  17. on mouseEnter me
  18.   if the frame = (firstFrame + 1) then
  19.     cursor([500, 501])
  20.   end if
  21. end
  22.  
  23. on mouseLeave me
  24.   cursor(0)
  25. end
  26.  
  27. on endSprite me
  28.   cursor(0)
  29. end
  30.